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000000' 

oooooo- 



000005' 



NODULE 
-TITLE 
DDXCOM 



050103 
000 

888888 

000 

000 

000001 

000000 

mm 

000000 
040020 

88833*'- 

000000 
012500 
000000 
000000 
000000 
000000 
000000 



045102 



888182: 

000106* 
000110' 
000112' 
000114* 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000000 

000000 

000000 

000000 

000224* 

000000 

000000 

000000 

000002 

000040 



BKMOD <CPBJ >,,,, ,,12500, 2 

40020, CPBJ ffl ,,,12500,2 

CPBJ DKC/X11 SYSTEM EXERCISER MODULE 

VERSION 6 23-MAY-78 

.LIST BIN 
. ***************************** 

BEGIN 
040 



MODNAM: 


.ASCII /CPBJ / ;MODULi 


xflag: 


.BYTE OPEN 


ADDR: 
vector: 


♦0 ;IST Dl 


BR1: 


•BYTE PRTY+O 


BR2: 


.BYTE PRTY+O 


DVIDl: 

SRI: 


*1 


OPEN 


SR2: 


OPEN 
OPEN 


SR3: 


SR4: 


OPEN 


.***************************** 


5tat: 


40020 


INIT: 


START 


spoint: 


MODSP 


pascnt: 





icont: 


12500 


icount: 





sofcnt: 





hrdcnt: 
sofpas: 


8 


HRDPAS: 





syscnt: 





rannum: 





config: 




m\\ 


8 


SVRO: 


OPEN 


svri: 


OPEN 


SVR2: 


OPEN 


SVR3: 


OPEN 


SVR4: 


OPEN 


SVR5: 


OPEN 


SVR6: 


OPEN 


CSRA: 


OPEN 


sbadr: 




acsr: 


OPEN 


wasadr: 




astat: 


OPEN 


errtyp: 




asb: 


OPEN 


awas: 


OPEN 


rstrt: 


RESTRT 


hoto: 


OPEN 


wdfr: 


OPEN 


INTR: 


OPEN 


idnum: 


2 




.REPT SPSIZ 



****************************************** 

;USFD TO KEEP TRACK OF WBUFF USAGE 
EVICE ADDR, 

;1ST DEVICE VECTOR. 

;1ST BR LEVEL. 

J.2ND BR LEVEL. 

;DEVICE INDICATOR 1. 

JSWTTCH REGISTER 1 

;SWITCH REGISTER 2 

;SWITCH REGISTER 3 

$ SWTTCH RFGISTER 4 
***************************************** 

; STATUS *ORD. 

;MODULE START ADDR. 

{MODULE STACK POINTER. 

;PASS COUNTER. _ rt 

;# OF ITERATIONS PER PASS=12500 

;LOC TO COUNT ITERATIONS 

5LQC TO SAVE TOTAL SOFT ERRORS 

;LQC TO SAVE TOTAL HARD ERRORS _ 

;LOC TO SAVE SOFT ERRORS PER PASS 

;LOC TO SAVE HARD ERRORS PER PASS 

?# OF SYS ERRORS ACCUMULATED n „,.„„ 

;HOLDS RANDOM # WHEN RAND MACRO IS CALLED 

;RESERVED FOR MONITOR USE 

PRESERVED FOR MONITOR USE 

PRESERVED FOR MONITOR USE 

;LOC TO SAVE RO. 

|LOC TO SAVE Rl. 

;LOC TO SAVE R2. 

?LOC TO SAVE R3. 

;LOC TO SAVF R4. 

;LOC TO SAVE R5. 

;LOC TO SAVE R6. 

;ADOR OF CURRENT CSR. 

;ADDR OF GOOD DATA, OP 

pCONTENTS OF CSR. 

;ADDR OF BAD DATA, OR 

;STATUS REG CONTENTS. 

;TYPE OF ERROR 

;EXPECTED DATA. 

;ACTUAL DATA. 

iRESTART ADDRFSS AFTER END OF PASS 

?VORDS TO MEMORY PER ITERATION 

;WORDS FROM MEMORY PEP ITERATION 

;# OF INTERRUPTS PER ITERATION 

^MODULE IDENTIFICATION NUMBER=2 

;«ODULE STACK STARTS HERE. 
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MODULE MACYll 30A(1052) 12-OCT-78 16:25 PAGE 6 

.NLIST 

.WORD 

-LIST 

.ENDR 
MODSP: 
. *********************** 



SEQ 0005 



********************* ******** ******************* 
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!',! 



.a 

176 
27 



000224* 

mm 

000224* 104413 000000" 



til 

m mm- 

182 000240* 

183 000246' 

i m 

187 

f 88 

189 000262- 

190 



194 
195 
196 

197 000270 

198 000274 
1*9 000300 

ffl }"""' 

20? 

"-* 000326 
000330 



8: 



mm 

012767 

mm 

001403 



001 
104405 



012703 



' 001403 



mm 

022767 



001 
104405 




001 
104405 



8SSS1S 

177777 001342 
001600- 
125252 001330 



oooooo- 000000 



125252 
000010 

001624- 001330 
171777 001310 
001626- 
052525 001276 



000000- 000000 



000010 



000000- 000000 



SEQ 0006 



START: 

rfstrt: 



ENDIT 
ENDTTS, BEGIN 



u 



UC(R2) 
125252, TEMP 



MOV 

MOV 

MOV 

XOR 

CMP 

8EQ 

HRDER . 

• ******************** 

-IF B <> 

HRDERS, REGIN, NULL 

.IFF 

HRDERS, BEGIN, ;XQR 

«ENDC 

•ft******************* 



;SIGNAL END OF ITERATION 
;MONITOR SHALL TEST END OF 

?SET HP INDEX REGISTER 
;LOAD SOURCE OPERAND 
;L0A0 DESTINATION OPERAND 
;XOR SOURCE, DFST. 



************** 



;SBTTL 
IS: 



;XOR INSTRUCTION FAILED 
NSTRUCTION FATLFD 
***************************** 

TEST XOP USING INDEX DEFERRFD 



************* 



125252, R3 
10, R4 
*Y, X-HO 



MOV 

mov 

MOV 

MOV 

XOR 

CMP #_ 

BFQ 2S 

HRDER g 

• ***************** * 

»TF B <> 

HRDFRS, BEGIN, NULL 

«TFP 

HRDERS, BEGIN, ;XOR -1,125252 FAILED 

»ENDC 

• ft**** ****************************** *************** 

?SBTTL TEST SOB FOR BRANCH 



<*QR -1*125252 ' ? AILED> 
****************************** 

;XOR -1,12525? FAILED 



**************** 



************* 



25: 

I8i?i 



BR 

BR 

MOV 

SOB 

HRDER , 

• ********* 

•IF B <> 

HRDERS, BEGIN, NULL 

• IFF 



S081 
SOB3 
#10, Rl 
Rl,SOR2 

<SOR SHOULD HAVF BRA 
**************************************** 



;SOR SHOULD HftVE BRANCHED 
SOR SHOULD HAVE BRANCHED 



HRDERS, BEGIN, 

.ENDC 

*************************************************** ************* 

?SBTTL TEST SOR FOR NO BRANCH 



CPBJ DEC/X11 
XCPBJ0»P11 



SYSTEM EXERCISER MODULE 
12-OCT-78 11:57 



229 



000356- 
000360* 



104405 



mm 

000374 



oooooo- oooooo 



- 012701 000001 

- 077107 
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SOB3S 

sobs: 



SEQ 0007 



BR 



SOB4 



•********************************«*******************#*****«**** 

*IF B <> 

HRDERS, BEGIN, NULL ;SOR SHOULD NOT HAVE BRANCHED 

.IFF 

HRDERS, BEGIN, ;SOR SHOULD NOT HAVE RRANCHED 

2 *************************************************************** 

BR MA 
MOV fl/Rl 
SOB Rl,SOR5 



000376- 
00040?- 

imt' 

000414- 

mm- 

000426- 
000430- 
000434- 
000436- 
000442- 
000444- 



000452° 

888^I§- 

000460 s 



016706 177430 



00007 



005001 

0ll746 56o66i 
012746 006401 

004767 000002 

000403 

016501 000002 

000205 

022701 000001 

001403 



10440S OOOOOO- 000000 



026706 177354 
001403 



001 
104405 OOOOOO" 000000 



000 



022705 000007 
001403 



mm- 

000474- 

001 
000474- 104405 000000* 000000 

000 



ISBTTL 


TEST 


MARK INSTRUCTION 


ma: 


MOV 


SPOTNT,SP 




CLR 


IkiiH 




MOV 




MOV 




MOV 


#MARKl,-(SP) 




MOV 


SP,R5 




JSR 


PClMARKO 
MARKOA 




8R 


HARKO: 


MOV 
RTS 


2(R5),R1 
R5 


MARK0&: 


CMP 


81, Rl 




BEQ 


IS 



IS: 



MNITIALIZE STACK POINTER 

;push a parameter on the stack 
;push mark 1 on the stack 
;load parametfr pointer 
;go to subroutine 

;get the parameter 

;FXTT SUBROUTINE 

?DID SUBROUTINE GET THE PARAMETER 

HRDER , SUBROUTINE DID NOT GET PUSHED PARAMETER> 

•A************************* ******************************* ****** 

.IP B <> 

HRDERS, BEGIN, NULL SUBROUTINE DTD NOT GET PUSHED PARAMETER 

-TFF 

HRDERS, BEGIN, ;SURROUTINE DID NOT GET PUSHED PARAMETER 

.ENDC 

J*************************************************************** 

CMP SPQINT,SP JTS STACK POINTER CORRECT? 

BFQ 2S 

HRDER , <STACK POINTER INCORRECT FOR MARK> 

•I*************************************************************** 

.IF B <> 

HRDERS, BEGIN, NULL JSTACK POINTER INCORRECT FOR MARK 

»TFF 

HRDERS, REGIN, ;STACK POINTER INCORRECT FOR MARK 

„ENDC 

********* ************************************* ******************* 

CMP #7,R5 ?IS R5 CORRECT? 

BEQ 3S 

HRDER , <MARK DID NOT LOAD R5> 

•*****«*********&********»******************* ** ******* ********** 

.IP B <> 

HRDFRS, REGIN, NULL ;MARK DID NOT LOAD R5 

.IFF 

HRDERS, BEGIN, ;«APK DID NOT LOAD R5 

.ENDC 
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290 

m 

293 
294 
295 
296 
597 
29B 

ffl 

301 



000502" 012702 
000506" 012767 
000514 s5 000257 
000516" 006762 
000522" 005767 
000526' 001403 
000530' 

001 
000530" 104405 



000536* 005067 

000542 s 000277 

000544" 006767 

000550" 022767 

mm' ° 01403 



000010 
177777 



001600" 
001062 



000000" 000000 




001046 



09^040 



777 001032 



000560* 104405 000000- 000000 
000 



vim mm 

001403 



177216 



177776 

000642" 



104405 000000- 000000 



000634" 005726 
000636- 005726 



5SBTTL 
3SS 



;S8TTL 
55: 



6S: 
7S: 



• *iS*#***#*Sr*fc#******»**ft***»*ft**********ft****ft»********** 

TEST THE SXT INSTRUCTION 

;SET UP INDEX REGISTER 



#10, R2 
#-l,TEH«» 



MOV 
MOV 

ccc 

SXT C(R2) 

TST TEMP 

BEQ 4S 
HRDER , 

********************* 

.IF B <> 

HRDERS, BEGIN, NULL 

.IFF 

HRDERS, BEGIN, ?0'S 

.ENDC 

********************* 

CLR TEMP 

SCC 

SXT TEMP 

CMP #-l,TEMP 

BEQ 5S 

HRDFR f 

* ******** ************ 

•IF B <> 

HRDERS, BEGIN, NULL 

.IFF 

HRDERS, BEGIN, J-l D 

.ENnc 

. ******************** 
TEST THE RTT INSTRUCTI 
S.POINT,SP 



;CLEAR ALL CONDITION CODES 
;EXTEND 0-S INTO TEMP CC(R2)3 



******** 



;0-S DOID MOT EXTEND INTO TEMP 
DQID NOT EXTEND TNTO TEMP 
******************************************* 



;SET &LL CONDITION CODES 
;EXTEND 1-S INTO TEMP 



<-l DID NOT EXTEND INTO TFMP> 
********************************* 



;-l DID NOT EXTEND INTO TEMP 



******* 



ID N 
**** 



OT EXTEND INTO TEMP 
******************************* 



******* 



Mnv 

BIT 
BEQ 
CCC 
MFPS 

CCC 
MO? 



4, SRI 



7$ SP> 



MOV 
SCC 



PS,-(SP) 
#RTTA,-(SP) 

RTT 

HRDER , 

• *****%************* 

.IF B <> 

HRDERS, BEGIN/NULL 

.IFF 

HRDFRS, BEGIN, ;RTT 

-ENDC 

« ******************** 

TST 

TST 



JSg?l?s T 0lvi S 8{g^c?9 INTER 

?YES 

?CLPAR STATUS 

?PUSH ON ST&C* FOR RTT 

;SET UP PC FOR RTT 

;CLP COND CODES 

;PUSH IT ON STACK AS PS FOR RTT 

;PUSH RETURN PC ONTO STAC* 

? INSURE N=Z=V=C=1 BEFORE RTT 



*^***************** ************* 



(SPH 
(SP) + 



?RTT FAILED 

FAILFD 

*********************************** 

;POP STAC* 
;POP STftCK" 
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SEQ 0009 



341 

\\\ 


000640* 
000642- 


000407 












000642" 


100403 






m 


000644" 
000646" 
000650" 


181181 






346 


000403 






347 


000652* 
000652" 








?« 








350 




001 






351 


000652" 


104405 


oooooo- 


000000 


352 
353 


















354 
355 

356 




000 






000660" 


032767 


000001 


177130 


357 
358 


mm- 


001402 
000167 


177330 




359 

360 


















362 


000674" 


005003 






000676- 
000702" 


012702 


000005 




363 


005067 


000746 




364 
365 


000706- 
000714" 


8HJW 


000002 


000740 


366 


000716" 


070267 


000732 




367 
368 
169 


000722" 


100402 






mm- 


101401 
102003 






370 


000730- 








171 
372 
373 


000730- 


001 






374 

111 


000730" 


104405 


oooooo- 


000000 










377 




000 






37B 










nz 


mm- 


022703 
001403 


000012 




in 


000744" 








383 




001 






384 


000744- 


104405 


000000" 


000000 


385 










SM 




000 






388 










389 


000752" 


005702 






390 


000754" 


001403 






391 

m 


000756- 










001 






m 


000756" 


104405 


oooooo- 


000000 


396 











RTTAS 



10$: 



MULl: 



10$: 



2$: 



BLOS 

BVS 

BR 

HRDER , 

• ****** 

a IF B <> 

HRDERS, B 
.IF* 

HRDERS, B 
.ENDC 

• ******* 

BIT 
BEQ 
JMP 



RTTP. 
10$ 

18! 

RTTB 

*******! 



;GO ON WITH TEST 

;IF N SET, REPORT ERROR 
;IF C OR Z SET.REPQRT ERROR 
;TF V 5ET,REP0RT ERROR 
}l¥ YES GO ON WITH TEST 

<INCORRECT STATUS> 

r********************* ************* *************** 



EGIN,NULL ? INCORRECT STATUS 

EGIN, JTNCURRECT STATUS 

************************************** 

tflfSRl 

MULl 

START 



****************** 



CLR 
MOV 
CLR 
MOV 
SCC 
MUL 
BMI 
BLOS 



#5,R2 
PLIER 
#2,PLI 

PLIER 

IP 



rR2 



;CLEAR R3 

;load multipicand 

?LO&D MULTIPLIER 

;PRESET CONDITION CODES 

MULTIPLY 2X5 RESULT IN R2 (MSH);R3 (LSH) 

;IF N SET,REPORT ERROR 

;TF C OR Z SET,REPORT ERROR 

;IF V = 0,GO ON WITH TEST 



.IF B <> 

HRDFRS, BEGIN, 
.TFF 

HRDERS, BEGIN 
»FNDC 

• ************ 

CMP #12, R 
BEQ 2$ 
HRDER , 

• ********* 

.IF B <> 

HRDFRS, BEGIN, 

.IFF 

HRDERS, BEGIN, 

.ENDC 

• ************ 

TST R2 
BEQ MUL2 
HRDFR - 
. ************ 

.IF B O 

HRDERS, BEGIN, 

.IFF 

HRDERS, BEGIN, 



NULL ;CC'S NOT = 
JCC'S NOT = TO 0-S 



TO 0-S 



******************************** 



********* 



r********* 



jBRANCH IF THE RESULT (LSH) IS CORRECT 
<INCORRECT RESULT (LSH)> 
*************************************************** 

NULL ;TNCORRFCT RESULT (LSH) 

f INCORRECT RESULT (LSH) 
*************************************************** 
;CORRECT RESULT («SH)? 



********** 



<INC0PRECT RESULT (MSH)> 

***************************************** 



NULL ?INCQRRECT RESULT (MSB) 
;TNCOPRECT RESULT (MSH) 



CPBJ DEC/X11 SYSTEM EXERCISER MODULE MACYll 301(1052) 12-OCT-78 16:25 P&GE 11 

XCPBJ0.P11 12-OCT-78 11:57 SEQ 0010 

397 000 .END 



************************************************** ****** 



000764" 005003 MUL2: CLR R3 

000766- 005067 000662 CLR PLIER 

mm mm mm 000650 usj mm* 

001004* 070267 000644 HUL PL1ER,R2 ^MULTIPLY 2X125252 RESULT=-1 (R2) 

mm: mm dcc m iiF$*iH]f&?htfh*Q*' Csl 

QQlQll. JPS99? 8PL 10$ ;TP N = 0, REPORT ERROR 



R2 ;LOSD MULTIPICAND 

^MULTIPLY 2X125252 
?52524(R3),N=1,Z=0 
;IF C = 0, REPORT E...._ . 
xzirirz. r n -^xf »■ - — * / TP N = 0, REPORT ERROR 

001014' 102401 BVS 10$ ; TF V SET, REPORT ERROR 

001016- 001003 BNE 1$ ;IF Z = 0,GO ON WITH TEST 

001020- 10$: 

001020- HRDER , CTNCURRECT CONDITION CODES> 



*************************************************************** 

001 '.IF B <> 

001020- 104405 000000- 000000 HRDERS, BEGIN, NULL ;TNCORRECT CONDITION CODES 

- IFF 
HRDERS, BEGIN, ; INCORRECT CONDITION CODES 

000 .ENDC 

**************************************************************** 

JJJJjj: UUU I777?7 1$: BEQ % l ' R7 CORRECT MSB RESULT? 

001034- HRDER , CINCORRECT MSB RESULT> 

**************************************************************** 

001 .IF B <> 

001034- 104405 000000- 000000 HRDFRS /BEGIN, NULL ;INCORRECT MSB RESULT 

.IFF 
HRDERS, BEGIN, yTNCQRRECT MSH RESULT 

000 -ENDC 

. ******************************************** ******************* 

001042- 022703 052524 2$: CMP #52524,R3 ;CORRECT LSB RESULT? 

001046' 001403 BEQ ASH1 

001050- HRDFR , <INCORRFCT LSB RESULT> 

**************************************************************** 

001 .IF B O 

001050- 104405 000000- 000000 HRDERS, BEGIN, NULL ;INCORRECT LSH RESULT 

-IFF 

HRDERS, BEGIN, ; INCORRECT LSB RESULT 
000 .ENDC 

**************************************************************** 

.SBTTL TEST ASH INSTRUCTION 

001056- 005067 000572 ASHl: CLR PLIER 

001062- 012767 000001 000564 MOV #1*PLIER ;LOAD SHIFT VALUE (+1 OR 1 PLACE LEFT) 

001070- 012702 125252 MOV #125252, R2 ;GET VALUE TO BE SHIFTED (#125252) 

OQ1Q25* 000257 CCC ;PRE-CLEAR ALL CC BITS 

001076- 000264 SFZ ;PRE-SET 7, RIT 

001100- 000270 SEN ;PRE-SET N BIT 

001102- 072267 000546 ASH PLIER, R2 ;SHTFT 1 PLACE LEFT RESnLT = 52524 

" N— 7—0 V~ 1 f— 1 

001106- 100403 BMI 10$ ;IF fi SET,RFPORT ERROR 

001110- 001402 3EQ 10$ ; IF Z SET, REPORT ERROR 
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BVC 10$ ;IF V = 0, REPORT ERROR 

BCS IS ;IF C SET, GO ON WITH TEST 

10$: 

HRDER , 
• ******** 

-IF B <> 

000000- 000000 HROERS, BEGIN, NULL ;INC0RRECT CONDITION CODES 

. IFF 

HRDERS, BEGIN, ; INCORRECT CONDITION CODES 
.FNDC 
**************************************************************** 

052524 1$: CMP #52524, R2 ;RESULT CORRECT? 
BEQ ASH2 

HRDER , <INCORRECT RESULT> 

**************************************************************** 

-IF B <> 

000000- 000000 HRDERS, BEGIN, NULL ;INCURRECT RESULT 

.IFF 

HRDERS, BEGIN, ;TNCUPRECT RESULT 
.ENDC 
**************************************************************** 

000510 ASH2: CLR PLIER 

177777 000502 MOV #-1, PLIER ;LOAD SHIFT VALUE (-1 OR 1 PLACE RIGHT) 

052525 MOV #52525, Rl ;GET VALUF TO BE SHIFTED (#52525) 
000472 ASH PLIER, Rl ;SHTFT 1 PLACE RIGHT RESULT = #25252 
025252 CMP Rl,#25252 ;RESULT CORRECT? 




HRDER 
********************** 

.IF B <> 

000000- 000000 HRDERS, BEGIN, NULL ;INCORRECT RESULT 

.IFF 

HRDERS, BEGIN, ? INCORRECT PESULT 
.ENDC 
**************************************************************** 

;SBTTL TEST &SHC INSTRUCTION 

ASHCl: CLR H7. ;CLFAR MSH RESULT REGISTER 
000450 CLR PLIER 

000020 000442 MOV #16., PLIER ;LOAD SHIFT COUNT (16 PLACES LEFT) 

125252 MOV #125252, R3 ;GET VALUE TO BE SHIFTED (#125252) 

CCC ;PRE-CLEAP ALL CC BITS 

SEZ ;PRE-SET 7. BIT 

SEC ;PRE-SET C BIT 

,, 000424 ASdC PLIER, R2 ;SHIFT if IN R? TO R2 

->00 ;CC: N=1,Z=0,V=1,C=0 

501 001230- 100003 BPL 10$ ; IF N = 0, REPORT ERROR 

502 001232- 001402 BEQ 10$ ;IF Z SET, REPORT ERROR 

503 001234' 102001 BVC 10$ ?IF V = 0, REPORT ERROR 

504 Miilfil 103003 a BCC 1$ ; IF C = 0,GO ON WITH TEST 

506 001240- * HRDFR , <INC0RRECT CONDITION CODES> 

CQ7 **************************************************************** 

50B 001 .IF B O 
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) 



509 
510 
511 

m 

514 
515 

1' 

_18 
519 

ill 

523 
524 

525 
526 
527 
528 
529 
530 

m 

533 
534 
535 
536 
537 
538 
539 
540 
541 
542 
543 
544 
545 
545 
547 
548 
549 
550 
551 
552 
553 
554 
555 
556 
557 
558 
559 
560 
561 
562 
563 
564 



12-0CT-78 n : 57 
001240* 104405 000000' 000000 



M&CY 
TEST 



11 301(1052) 12-OCT-78 
ASH INSTRUCTION 



001246' 022702 
001252' 001403 
001254* 

001 
001254* 104405 



000000' 000000 



001262* 
001264' 
001266' 



001403 



001266' 104405 000000' 000000 



000 



mviv- 


005003 
005067 


000352 


001302' 
001310' 
001314' 


012767 
012702 
000250 


177760 
125252 


001316' 
001320' 


000264 
000262 






001322' 
001324* 


%vm 


000324 


001330' 


100002 




001332' 


101401 




88113f= 

001336' 


102003 









ASHC2: 



000344 



10$: 



001344' 
001350' 
001352' 



001 
104405 000000' 000000 



022702 177777 

001403 



001 
001352* 104405 000000' 000000 
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?INCQRRECT CONDITION CODES 



SEQ 0012 



HRDERS, REGIN, NULL 

. IFF 

HRDFRS, BEGIN, ;INCORRFCT CONDITION CODES 

.ENDC 

. *************** 



********************************************** 



BEQ 2 
HRDER , 
********* 

.IF B <> 

HPDERS, BEGIN, NULL 



************* 



;BRANCH IF CORRECT RESULT 
<INCQRRECT RESULT FOR ASHC LEFT SHIFT> 
**************************************** 



.IFF 

HRDERS, REGIN, 



; INCORRECT RESULT FOR ASHC LEFT SHIFT 
; INCORRECT RESULT FOR ASHC LEFT SHIFT 



.ENDC 

■***************************i 

TST R3 ;WAS 

HRDER , * <# WAS NOT SHIFTED OUT OF R3 PROPERLY> 

. *************************************************************** 



*********************************** 
* SHIFTED OUT OF R3? 



• f n WAS NOT SHIFTED OUT OF R3 PROPERLY 



.IF B <> 

HRDERS, BEGIN, NULL 

.TFF 

HRDFRS, REGIN, ;f WAS NOT SHIFTED OUT OF R3 PROPERLY 

ENDC 
* *************************************************************** 



CLR 
CLR 
MOV 
MOV 
CLN 
SFZ 
SEV 
SEC 
ASHC 

3PL 

BLOS 

BVC 



R3 
PLIER 



MSkSW 



PLIER, R2 

10$ 
10$ 
IS 



.TF B <> 

HRDER' "' 



JCLEAR RESULT REGISTER 

?LOAD SHIFT COUNT (16 PLACES RIGHT) 

?LOAD jf TO BE SHIFTED (#125252) 

;PRE-CLEAR N BIT 

?PRE-SET 7. BIT 

; V » 

. ti C " 

;SHIFT R2 16 PLACFS RIGHT INTO R3 

;cc: N=l,z=v=c=0 

;IF N = 0, REPORT ERROR 

; IF C OR Z SET, REPORT ERROR 

;TF V = 0,GO ON WITH TEST 



; INCORRECT CONDITION CODES 



HRDER$/-BEGIN,NULL 

IFF 
HRDERS, REGIN, ; INCORRECT CONDITION CODES 

**************************************************************** 

6MP tf-l,R2 ;niD SIGN EXTEND IN R2? 

BFQ 2$ 

HRDER , <SIGN FAILED TO EXTEND> ^ ^ ^ ^ ^ 

I*************************************************************** 

ClF B O 

HRDERS, BEGIN, NULL JSIGN F&ILED TO EXTEND 

.IFF 

HRDERS/BEGIN, ;SIGN FAILED TO EXTEND 



CPBJ DEC/X11 SYSTEM EXERCISE 
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MODULE 



69 001366* 



565 
566 
5 

569 
570 
571 
572 
573 
574 
575 
576 
577 
578 
579 
580 
581 
582 
583 
584 
585 
586 
587 
588 
589 
590 
591 

115 

594 
595 
596 
597 
598 
599 
600 
601 
602 
603 
604 
605 
606 
607 
608 
609 
610 
611 
612 
613 
614 

m 

617 
61B 
619 
620 



22703 125252 
"1403 



001 



001366' 104405 000000' 000000 
000 



001374' 012701 000004 
001400' 005002 
001402' 012703 052525 
001406' 000277 
001410' 071261 001556' 



MACYll 
TEST AS 



2S: 



JSBTTL 

oivi: 



30A(1052) 12-OCT-78 
H INSTRUCTION 
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SEQ 0013 



001414' 100402 
001416' 101401 
001420' 102003 
001422' 
001422' 



10$: 



001 
001422' 104405 000000' 000000 



001430' 
001434' 
001436' 



20227 000001 
01403 



001 



001436' 104405 000000' 000000 



001444' 005703 
001446' 001403 
001450' 



001450* 



001 
104405 



oooooo- 000000 



001456' 005067 000172 
001462' 012704 157777 



CMP 

BEQ 

HRDER , 

**************** 



******************************************************* 

125252, R3 ?DID R2 SHIFT TO R3 

IV1 

<R2 DTD NOT SHIFT INTO R3> 
*********************************************** 

HRDPRS, BEGIN, NULL ;R2 DTD NOT SHIFT INTO R3 

.IFF 

HRDERS, BEGIN, ;R2 DID NOT SHIFT INTO R3 

1 *********************************************** **************** 
TEST THE DIVIDE INSTRUCTION 



MOV 
CLR 
MOV 
SCC 
DIV 

BMI 

3LOS 
BVC 

HRDER 



#4,R1 ;LOAD INDEX REGISTER 

R2 ;CLEAR QUOTIENT REGISTER 

#52525, R3 ;LOAD LSH DIVIDEND 

;PRE SET THE CONDITION CODES 
B(Rl),R2 ;DIVIDE #52525 BY B(R1) (*52525) 

; QUOTIENTS, REM=0,C=N=V=2=0 
10$ ;tf H SET, REPORT ERROR 

10$ ;TF C OR 7. SET, REPORT ERROR 

1$ ;IF V = 0,GO ON WITH TEST 



? INCORRECT CONDITION CODES 



, <TNCORRECT CONDITION CODES> 

. *************************************************************** 

HRDERS, BEGIN, NULL 

.IFF 

HRDFR$,REGIN, ; INCORRFCT CONDITION CODES 

FNDC 
1*************************************************************** 

CUP R2,*l ;QUOTIENT CORRECT? 

BFQ 2$ ;branch IF THE QUOTIENT IS CORRECT 

HRDER , <TNCORRECT QUOTIENT* 

.*************************************************************** 

'if b o 

hrdfrs, begin, null ;tncorrfct quotient 

.IFF 

HRDERS, BEGIN, ;TNCORRECT QUOTIENT 

r ********************************************** ***************** 

TST R3 REMAINDER CORRECT? 

3EQ DIV2 ;BRANCH IF THF REMAINDER IS CORRECT 

HRDER , <INCORRECT REMAINDER) 

• ft************************************************ ************** 

I TF B O 

HRDERS, BEGIN, NULL ;INCORRFCT REMAINDER 

.IF" 

HRDERS, BEGIN, ;TNCOPRECT REMAINDER 

.ENDC 

.**--- 



****************** 



ft******************************* 



******** 



CLR 
MOV 



PLIER 
#157777, R4 



;LOAD MSH DIVIDEND 



CPBJ 
XCPBJO 

621 

III 

m 

626 

SB 

629 
630 

h 
m 

635 

ttf 

638 
639 

640 

ttl 

643 
644 
645 
646 
647 
648 
649 
650 
651 
£52 
653 
654 
655 

w 

658 
659 

U[ 

662 
663 

666 
667 
668 
669 
670 
671 

tn 

674 
675 
676 
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001466- 012705 100001 

°o o o\ui- mm ioooo ° ° 00154 

001502- 071467 000146 



MACY1 

TEST 



1 3011(1052) 12-OCT-78 
ASH INSTRUCTION 
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001506- 100402 
001510- 101401 
001512- 102003 



001514- 
001514- 



001 



001514- 104405 000000' 000000 



001522- 020427 040000 
001526- 001403 
001530- 

001 
001530- 104405 000000- 000000 



000 

001536- 020527 
TD1542- 001403 
001544- 



100001 



001542- 001403 
0O1544- 

001544- 104405 000000- 000000 

000 



IS: 



nooooi,R5 

#100000, PLIER 



PLIER,R4 



10$ 

I? 1 



;load lsh divtdfnd 

jload divtsor into temp 

?pre-set all cc bits 

jdiyide #157777 100001 by 100000 

;quotif.nt=40000,rfm=100 001,c=n=v=?,=q 

;tf n set,report erpop 

;tf c or z set, report error 

;if V = 0,GO on with test 

<INCORRECT CONDITION CQDES> 

*************************************** 



******************** 



001552* 000167 176446 
001556- 125252 
001560- 001556- 
001562- 052525 


3$: 
B: 


JMP START 
125252 

B 
052525 


°9J>566- 
001566- 177777 
001^70- 001572- 


.=8+10 
A; 


-1 
A*4 


001572- 
001572- 125252 
001574- 001576- 
001576- 052525 
001600- 000000 
001602- 001600- 


. = A*4 

C: 


125252 

A*10 
052525 


C 



NOV 
MOV 
SCC 
DTV 

BMI 

BLOS 
BVC 

^RDER , 

. *********************** 

.IF B <> 

HRDERS, BEGIN, MULL ^INCORRECT CONDITION CODES 

HRDERS, REGIN, ^INCORRECT CONDITION CODES 
.FNDC 

•A******************************************* 

CMP R4,S40000 ;QUOTIENT CORRECT? 

8EQ 2S ;BRANCH IF THF QUOTIENT IS CORRECT 

HRDER , <TNCORRECT QUOTIENT> 

J************************************* *********************** 

.TF B <> 

HRDERS, BEGIN, NULL JINCORRFCT QUOTIENT 

• IFF 

HRDERS, BEGIN, ;TNCURRECT QUOTIENT 

.ENDC 

I************************************************************ 

CMP R5,fl00001 ?REMAINDER CORRECT? 

BEQ 35 ;RHANCH IF THE REMAINDER IS CORRECT 

HRDFR . <INCORRFCT REMAINDER> 

******* a*************************************** ************** 

.IF B <> 

HRDERS, REGIN, NULL ^INCORRECT REMAINDER 

*IFF 

HRDERS, BEGIN, ;INC0RRECT REMAINDER 

»ENOC 

************************************************************* 



} ADDRESS OF B 



.) 



} ADDRESS OF A+10 

;addrfss of c 



001610- 



=C*10 
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677 
678 
679 
680 
681 
682 
683 
684 
685 
686 

m 

691 



12-0CT-78 11:57 



001610- 000000 
001612- 001610- 



001616- 

001620- 

000000 

006401 

000000 

140000 



001616- 
001620- 



001622* 



HACYll 30A(1052) 12-OCT-78 
TEST ASH INSTRUCTION 



001624' 
001626- 
001654- 



177776 
000000 
000013 
000000 
000001 



TEMPI 




TEMP 



»=TEMP*6 

TEMP*10 

D:0 

HARK1= 6401 

CNTJ 

UM=14O000 

PS=177776 

y:o 
X: .RLKW li. 
plier:o 

.END 



16:25 PAGF 16 

;ADDRFSS OF TEMP 

} ADDRESS OF TEMP*10 OR "D M 

PROCESSOR STATUS WORD 



SEQ 0015 



) 
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CROSS REFERENCE T48LE ~ USER SYMBOLS 



SEO 0016 



A 

ACSR 


m?m 


566* 
155* 


667 


669 


AQDR 


000006R 


.21S 
[80 






M8"" = 


001176R 






&SHC1 


492* 




ASHC2 


001274R 


525 


535* 




AS? IT 


001056R i 

001140R 

000104R 


L57S 


mt 




AWAS 
B 


0°0°1°^ 


;§r 


iw 


662 


BEGT& 


000000R 


.IB* 


1R9 






374 


384 
572 


394 




1 


>62 


593 


BTTO = 
BTTt = 


00008] 


:?!! 






BIT10 = 


002000 


.73* 






1B11 1 

BIT13 = 


004000 


.73* 






8^8888 


73« 
73* 






BJT14 = 
BTT15 = 
8IT2 = 


°MZ 


■m 






000004 


73» 






WW l 


000010 
000020 


73I 






BTT5 = 


000040 






BTT6 = 
BIT7 = 


888^88 


73* 

73* 
73$ 






BTT8 = 


000400 






BREAKS= 


000012R 


W, 






8R1 


231 






BR2 
BTODS = 


000013R 
104421 


m 

83* 






C 


001600R 


2 Q2* 


673 


CDA?AS= 


104412 


.73* 






CUT 
CONFIG 


001622R t 
000056R 


:ttl 






CSRA 


000100R 


53* 






0ATCKS= 


mw ! 


m\ 






DATER$= 


hti&U \ 


73* 






DIV1 


>68 


580* 




DTV2 
DfTDl 


mam i 


t!It 


619* 




ENDITS= 


104413 


73f 


177 




ENDS = 
ERRTtfP 


0Q0106R 


m 






EXITS = 


104400 


73* 






GETPAS= 
GWBUF$= 
HRDCNT 


000044R 


.73* 
73* 

L38* 






HRDERS= 


104405 


\l¥ 


189 
394 


207 
415 






>72 


593 


603 



665 
207 
415 

603 



222 
425 
6t3 



234 

ffl 



261 


271 


281 


298 


312 


334 


351 


459 
643 


469 
653 


484 


509 


519 


529 


552 



222 
425 
613 



234 
435 
633 



459 465 
643 653 



m 



281 

484 



2 8 


312 


33 4 


351 


374 


09 


519 


529 


552 


562 
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SEQ 0017 



HRDPAS 


000050R 


140* 
135* 


























sICONT 


000036R 


























I COUNT 


000040R 


136* 


























WT 


mm 


mi 


























INTR 


000120R 


164* 


























MA 


000376R 


239 


246* 
























MAP22S= 


000430R 


U 3 * 
252 


























MARKQ 


mi 
























HARKQA 


000436R 


253 
























MIRPTl = 


006401 


250 

119* 

133 


683* 
























MODNAM 
HODSP 


tmm 


171* 
























MSGHS = 


104403 


173* 
I7J* 


























MSGSS = 


104402 
104401 
000674R 


























MSGS = 


173* 


























MUL1 


357 


361* 
























HUL2 


000764R 


390 


401* 
189 
























NULL = 


000000 


173* 


207 


222 


234 


261 
459 


271 
469 
653 


m 


298 


312 


334 


351 
552 


m 






384 


394 


415 


425 
613 


435 


509 


519 


529 






572 


593 


603 


633 


643 














0*»E*J = 


000000 


120 


126 


127 


128 


129 


146 


147 


148 


149 


150 


151 


152 


153 






155 


157 


159 


160 


162 


163 


164 


173* 












OTOAS = 


104420 
000034R 


173* 
134* 


























.PASCNT 


























IpiRQS = 


000004 


173* 


























PLIER 


001654R 


363* 


36 4* 


366 


402* 


404* 


405 


443* 


444* 


449 


475* 


476* 


478 


493 






494* 
173* 


499 


536* 


537* 


543 


619* 


622* 


624 


690* 










POPSP = 
POPSP2= 


mm 


























PRTY = 


000000 


123 


124 


173* 






















PRTYO = 


000000 


173* 
173* 
173* 


























PRTY1 = 


000040 


























PRTY2 = 


000100 


























PRTY3 = 


000140 


173* 


























PRTY4 = 
PRTY5 = 


000200 
000240 


173* 
173* 


















































PRTY6 = 


000300 


173* 


























PRTY7 = 
PS 


mm 

177776 


173* 
123* 
173* 


327 


687* 






















psy = 


























PUSH = 


005746 


173* 


























PUSH2 = 


024646 


173* 


























RANUS = 


104417 


173* 


























RANNUM 


000054R 


142* 


























RESTRT 

RES1 

RES2 


mnn 


161 

144* 

145* 


175* 
























00006OR 

000U2R 


























RSTRT 


161* 

326 

341 


























RTTA 


000642R 


342* 
























RTTB 


000660R 


346 


356* 






















SBAOR 

SOBl 

SOB? 


0001Q2R 
Q00342R 


154* 
215 


217* 
























000340R 


216* 


218 
























SOB3 

SOB4 


000356R 
000370R 


l\l 


mi 
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XrLAG 

XORl 

Y 



231* 
137* 
173f 
139* 
133* 
1* 

HM 

\m 

132 

Hlf 

147* 
146* 

m 

_51* 
152* 

:J1» 

,73* 
<»85f 

::?« 

.63* 

_20* 

.80* 

99 

665* 



241 



246 
166 
321 



174« 



184 



201* 



200* 
669* 
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266 
356 



SEO 0018 



) 



358 



2Q0* 



?22 
67b» 



660 



293 



6R8* 
680* 



304* 



689* 



306* 



307 



680 



681 



*i 



ABS. 000000 
001656 



000 
001 



ERRORS DETECTED: 

DEFAULT GLOBALS GENERATED: 

XCPBJ0.XCPRJ0/SOL/CRF:SYM=DDXCOMrXCPRJ0 
RUN-TIME: 1 2 .3 SFCONDS 
ROM-TI1E RATIO: 12/4=3.0 
CORE USED: 7K (13 PAGES) 



>fi 



